-- card: 3624 from stack: in
-- bmap block id: 4490
-- flags: 0000
-- background id: 2649
-- name: Display


-- part 1 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=62 top=85 right=108 bottom=204
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card "Automation"
end mouseUp



-- part 2 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=62 top=115 right=138 bottom=204
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card "Sorting"
end mouseUp



-- part 3 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=61 top=147 right=170 bottom=203
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card "HotKeys"
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=61 top=180 right=203 bottom=203
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card "Display"
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=61 top=211 right=234 bottom=203
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card "General"
end mouseUp



-- part 8 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=256 top=132 right=150 bottom=368
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  set the hilite of card button 7 to FALSE
  if the hilite of me is true then
    set the hilite of me to true
  end if
  set the hilite of me to true
end mouseUp




-- part 9 (button)
-- low flags: 00
-- high flags: 6006
-- rect: left=256 top=148 right=166 bottom=368
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  set the hilite of card button 6 to FALSE
  if the hilite of me is true then
    set the hilite of me to true
  end if
  set the hilite of me to true
end mouseUp



-- part 10 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=315 top=286 right=308 bottom=377
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: OK
----- HyperTalk script -----
on mouseUp
  go card SLBnames
end mouseUp



-- part 11 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=383 top=286 right=308 bottom=445
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: OK
----- HyperTalk script -----
on mouseUp
  go to card "SLBnames"
end mouseUp



-- part 12 (field)
-- low flags: 01
-- high flags: 0004
-- rect: left=263 top=80 right=100 bottom=341
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Produ
----- HyperTalk script -----
on mouseDown
  put line 1 of card field "Produ" into zapper
  put "Chicago ,Geneva ,Helvetica ,Mobile ,Monaco ,Optima ,Palatino ,Times" into MENU



  Get HPopupMenu(menu,0,82,280)


  if it is not zero then

    Put Item 1 of it into TheLine
    if TheLine is not empty then
      put theLine into card field "Produ"

    else
      put zapper into card field "Produ"
    end if

  end if

end mouseDown



-- part 13 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=299 top=53 right=74 bottom=336
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  set the hilite of card button 11 to FALSE
  set the hilite of card button 12 to FALSE
  if the hilite of me is true then
    set the hilite of me to true
  end if
  set the hilite of me to true

end mouseUp



-- part 14 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=339 top=53 right=74 bottom=376
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  set the hilite of card button 10 to FALSE
  set the hilite of card button 12 to FALSE
  if the hilite of me is true then
    set the hilite of me to true
  end if
  set the hilite of me to true

end mouseUp



-- part 15 (button)
-- low flags: 00
-- high flags: 6006
-- rect: left=379 top=53 right=74 bottom=416
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  set the hilite of card button 10 to FALSE
  set the hilite of card button 11 to FALSE
  if the hilite of me is true then
    set the hilite of me to true
  end if
  set the hilite of me to true

end mouseUp



-- part 16 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=257 top=196 right=213 bottom=367
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  set the hilite of card button 14 to FALSE
  set the hilite of card button 15 to FALSE
  set the hilite of card button 16 to FALSE
  if the hilite of me is true then
    set the hilite of me to true
  end if
  set the hilite of me to true
end mouseUp




-- part 17 (button)
-- low flags: 00
-- high flags: 6006
-- rect: left=257 top=213 right=230 bottom=367
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  set the hilite of card button 13 to FALSE
  set the hilite of card button 15 to FALSE
  set the hilite of card button 16 to FALSE
  if the hilite of me is true then
    set the hilite of me to true
  end if
  set the hilite of me to true
end mouseUp




-- part 18 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=257 top=231 right=248 bottom=367
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  set the hilite of card button 13 to FALSE
  set the hilite of card button 14 to FALSE
  set the hilite of card button 16 to FALSE
  if the hilite of me is true then
    set the hilite of me to true
  end if
  set the hilite of me to true
end mouseUp




-- part 19 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=257 top=248 right=265 bottom=367
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  set the hilite of card button 13 to FALSE
  set the hilite of card button 14 to FALSE
  set the hilite of card button 15 to FALSE
  if the hilite of me is true then
    set the hilite of me to true
  end if
  set the hilite of me to true
end mouseUp




-- part contents for card part 12
----- text -----
Mobile